-- card: 6982 from stack: in.1 ееее
-- bmap block id: 7529
-- flags: 4000
-- background id: 2811
-- name: HQ Preferences
----- HyperTalk script -----
on openCard
  global t1, t2, t3
  put field "Winning Score" into t1
  put field "Playing Time" into t2
  put field "Vulnerability Score" into t3
end openCard

on closeCard
  global winningScore, playingTime, vulScore, t1, t2, t3
  if isNumber(field "Winning Score") then
    put field "Winning Score" into winningScore
  else put t1 into field "Winning Score"
  if isNumber(field "Playing Time") then
    put field "Playing Time" into playingTime
  else put t2 into field "Playing Time"
  if isNumber(field "Vulnerability Score") then
    put field "Vulnerability Score" into vulScore
  else put t3 into field "Vulnerability Score"
end closeCard

on arrowKey
  errorSound
end arrowKey

function isNumber theNum
put true into result
if the length of theNum > 0 then
  repeat with i = 1 to the length of theNum
    if char i of theNum < "0" or char i of theNum > "9" then
      put false into result
      exit repeat
    end if
  end repeat
else put false into result
return result
end isNumber



-- part 1 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=455 top=300 right=335 bottom=493
-- title width / last selected line: 0
-- icon id / first selected line: 2162 / 2162
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Return
----- HyperTalk script -----
on mouseUp
  visual effect zoom in
  go card "Player 1"
end mouseUp



-- part contents for background part 1
----- text -----
5000

-- part contents for background part 3
----- text -----
2000

-- part contents for background part 2
----- text -----
180